unit uUser;

interface

type
  TUser = record
  public
    username: string;
    pwd: string;
    price: Double;
  end;

implementation

end.

